set console off
set print   on
?  '----------------------------------------------------------------------------'
?  'R:'+str(recno(),3,0)
?? '   TRADUCTORES COMPILADORES E INTERPRETES    '
if len(trim(T_EXAMEN))>0
   ?? 'Examen',T_EXAMEN,F_EXAMEN
else
   ?? '                 ',FECHA
endif
?  '----------------------------------------------------------------------------'
?
?
?   hardcr(ENUNCIADO)
?
?  '----------------------------------------------------------------------------'
?
set print off
set console on
eject